object frmMaterialOrdenCompra: TfrmMaterialOrdenCompra
  Left = 59
  Top = 64
  Width = 601
  Height = 442
  Caption = 'Materiales Solicitados por Obra'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  DesignSize = (
    593
    408)
  PixelsPerInch = 96
  TextHeight = 13
  object lblFechaIni: TLabel
    Left = 8
    Top = 27
    Width = 28
    Height = 13
    Caption = 'Inicio:'
  end
  object lblFechaFin: TLabel
    Left = 132
    Top = 27
    Width = 25
    Height = 13
    Caption = 'Final:'
  end
  object Label5: TLabel
    Left = 398
    Top = 10
    Width = 25
    Height = 26
    Alignment = taCenter
    Anchors = [akTop, akRight]
    Caption = 'Filtrar por:'
    WordWrap = True
  end
  object Label1: TLabel
    Left = 265
    Top = 10
    Width = 61
    Height = 26
    Alignment = taCenter
    Anchors = [akTop, akRight]
    Caption = 'Identificador de Obra:'
    WordWrap = True
  end
  object btnExcel: TSpeedButton
    Left = 376
    Top = 377
    Width = 26
    Height = 26
    Anchors = [akRight, akBottom]
    Flat = True
    Glyph.Data = {
      46060000424D4606000000000000360400002800000016000000160000000100
      0800000000001002000000000000000000000001000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
      A6000020400000206000002080000020A0000020C0000020E000004000000040
      20000040400000406000004080000040A0000040C0000040E000006000000060
      20000060400000606000006080000060A0000060C0000060E000008000000080
      20000080400000806000008080000080A0000080C0000080E00000A0000000A0
      200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
      200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
      200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
      20004000400040006000400080004000A0004000C0004000E000402000004020
      20004020400040206000402080004020A0004020C0004020E000404000004040
      20004040400040406000404080004040A0004040C0004040E000406000004060
      20004060400040606000406080004060A0004060C0004060E000408000004080
      20004080400040806000408080004080A0004080C0004080E00040A0000040A0
      200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
      200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
      200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
      20008000400080006000800080008000A0008000C0008000E000802000008020
      20008020400080206000802080008020A0008020C0008020E000804000008040
      20008040400080406000804080008040A0008040C0008040E000806000008060
      20008060400080606000806080008060A0008060C0008060E000808000008080
      20008080400080806000808080008080A0008080C0008080E00080A0000080A0
      200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
      200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
      200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
      2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
      2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
      2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
      2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
      2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
      2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
      2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00A402A402A402
      A402A402A402A402A402A402A402A402000002A402A402A402A402A402A402A4
      02A402A402A402A40000A402FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA402
      000002A4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02A40000A402FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFA402000002A4FFFFFFFFFFFFFFFFFFFFFFA4
      02A402A402FF02A40000A402FF02A402A402A402A402A4FFA402A402A4FFA402
      000002A4FFA402A402A402A402A4FFA402A402A4FFFF02A40000A402FFFFA402
      A402A402A4FFA402A402A4FFFFFFA402000002A4FFFFFFA402A402A4FFA402A4
      02A402A4FFFF02A40000A402FFFFFFFFA402A4FFA402A402A402A402FFFFA402
      000002A4FFFFFFFFFFA4FFA402A402A4FFFFFFFFFFFF02A40000A402FFFFFFFF
      02FFA402A402A402A4FFFFFFFFFFA402000002A4FFFFFF02FFA402A402A402A4
      02A4FFFFFFFF02A40000A402FFFF02FFA402A402A402A402A402A4FFFFFFA402
      000002A4FFA4FFA402A402A4FFA402A402A402A4FFFF02A40000A402FF02A402
      A402A4FFFFFFA402A402A402FFFFA402000002A4FFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFF02A40000A402FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA402
      000002A4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02A40000A402A402A402
      A402A402A402A402A402A402A402A402000002A402A402A402A402A402A402A4
      02A402A402A402A40000}
    OnClick = btnExcelClick
  end
  object edtFechaIni: TDateEdit
    Left = 44
    Top = 21
    Width = 79
    Height = 21
    Ctl3D = False
    DefaultToday = True
    DialogTitle = 'Seleccione una Fecha'
    Enabled = False
    NumGlyphs = 2
    ParentCtl3D = False
    YearDigits = dyTwo
    TabOrder = 0
    Text = '07/12/06'
  end
  object edtFechaFin: TDateEdit
    Left = 165
    Top = 21
    Width = 85
    Height = 21
    Ctl3D = False
    DefaultToday = True
    Enabled = False
    NumGlyphs = 2
    ParentCtl3D = False
    YearDigits = dyTwo
    TabOrder = 1
    Text = '07/12/06'
  end
  object chbTodos: TCheckBox
    Left = 8
    Top = 3
    Width = 97
    Height = 17
    BiDiMode = bdLeftToRight
    Caption = 'Mostrar todos'
    Checked = True
    ParentBiDiMode = False
    State = cbChecked
    TabOrder = 2
    OnClick = chbTodosClick
  end
  object edtFiltro: TEdit
    Left = 431
    Top = 13
    Width = 121
    Height = 21
    Anchors = [akTop, akRight]
    BevelKind = bkFlat
    BorderStyle = bsNone
    CharCase = ecUpperCase
    TabOrder = 3
    OnChange = edtFiltroChange
    OnKeyPress = edtFiltroKeyPress
  end
  object btnDesfiltrar: TBitBtn
    Left = 559
    Top = 13
    Width = 25
    Height = 22
    Anchors = [akTop, akRight]
    Enabled = False
    TabOrder = 4
    OnClick = btnDesfiltrarClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000000101
      0100020202000303030004040400050505000606060007070700080808000909
      09000A0A0A000B0B0B000C0C0C000D0D0D000E0E0E000F0F0F00101010001111
      1100121212001313130014141400151515001616160017171700181818001919
      19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
      2100222222002323230024242400252525002626260027272700282828002929
      29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
      3100323232003333330034343400353535003636360037373700383838003939
      39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
      4100424242004343430044444400454545004646460047474700484848004949
      49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
      5100525252005353530054545400555555005656560057575700585858005959
      59005A5A5A005B5B5B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
      6100626262006363630064646400656565006666660067676700686868006969
      69006A6A6A006B6B6B006C6C6C006D6D6D006E6E6E006F6F6F00707070007171
      7100727272007373730074747400757575007676760077777700787878007979
      79007A7A7A007B7B7B007C7C7C007D7D7D007E7E7E007F7F7F00808080008181
      8100828282008383830084848400858585008686860087878700888888008989
      89008A8A8A008B8B8B008C8C8C008D8D8D008E8E8E008F8F8F00909090009191
      9100929292009393930094949400959595009696960097979700989898009999
      99009A9A9A009B9B9B009C9C9C009D9D9D009E9E9E009F9F9F00A0A0A000A1A1
      A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
      A900AAAAAA00ABABAB00ACACAC00ADADAD00AEAEAE00AFAFAF00B0B0B000B1B1
      B100B2B2B200B3B3B300B4B4B400B5B5B500B6B6B600B7B7B700B8B8B800B9B9
      B900BABABA00BBBBBB00BCBCBC00BDBDBD00BEBEBE00BFBFBF00C0C0C000C1C1
      C100C2C2C200C3C3C300B8BBC700ADB3CB00A3ACCF0099A5D300909ED6007086
      DE004969E7002950EE001642F3000D3BF5000838F6000536F7000435F8000335
      F8000334F8000334F9000334F9000334F8000334F7000334F6000434F4000434
      F1000433EF000433ED000533EB000533E9000533E7000632E4000632E1000632
      DE000632DD000632DD000632DD000632DD000731DD000831DD000C30DE00132F
      DF00202CE1004625E6007C1AED00CC0AF800EC04FC00F901FE00FD00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00F7F7F7F7F7F7
      F7F7F7F7F7F7F7F7E1E1F7E1E1F7F7F7F7F7F7F7F7F7F7E1E1F7F7E1E1E1F7F7
      F7F7F7F7F7F7E1E1F7F7F7E1E3E1E1F7F7F7F7F7F7E1E1F7F7F7F7F7DBE1E1E1
      F7F7F7F7E1E1F7F7F7F7F7F7F7F7E1E1E3F7E3E1E1F7F7F7F7F7F7F7F7F7F7E3
      DEDEDDE3F7F7F7F7F7F7F7F7F7F7F7F7DFDFDAF7F7F7F7F7F7F7F7F7F7F7F7E3
      DBDDDAD8F7F7F7F7F7F7F7F7F7F7D8DADCF7F7D8D1F7F7F7F7F7F7F7F7D1DAD5
      F7F7F7F7D1D1F7F7F7F7F7F7D1D1D1F7F7F7F7F7F7D1D1F7F7F7F7D1D1D1F7F7
      F7F7F7F7F7F7F7D1F7F7D1D1D1F7F7F7F7F7F7F7F7F7F7F7F7F7D1D1F7F7F7F7
      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7}
  end
  object identificador: TEdit
    Left = 332
    Top = 13
    Width = 55
    Height = 21
    Anchors = [akTop, akRight]
    BevelKind = bkFlat
    BorderStyle = bsNone
    CharCase = ecUpperCase
    TabOrder = 5
    OnChange = identificadorChange
    OnKeyDown = identificadorKeyDown
    OnKeyPress = identificadorKeyPress
  end
  object grdMaterial: TRxDBGrid
    Left = 7
    Top = 47
    Width = 578
    Height = 322
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataSource = s
    ReadOnly = True
    TabOrder = 6
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = grdMaterialCellClick
    OnTitleClick = grdMaterialTitleClick
    Columns = <
      item
        Expanded = False
        FieldName = 'RAZON'
        Title.Alignment = taCenter
        Title.Caption = 'Proveedor'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 231
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'MATERIAL'
        Title.Alignment = taCenter
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 222
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CANTIDAD'
        Title.Alignment = taCenter
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 87
        Visible = True
      end>
  end
  object btnVistaPrevia: TBitBtn
    Left = 408
    Top = 377
    Width = 97
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Vista Previa'
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000000101
      0100020202000303030004040400050505000606060007070700080808000909
      09000A0A0A000B0B0B000C0C0C000D0D0D000E0E0E000F0F0F00101010001111
      1100121212001313130014141400151515001616160017171700181818001919
      19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
      2100222222002323230024242400252525002626260027272700282828002929
      29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
      3100323232003333330034343400353535003636360037373700383838003939
      39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
      4100424242004343430044444400454545004646460047474700484848004949
      49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
      5100525252005353530054545400555555005656560057575700585858005959
      59005A5A5A005B5B5B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
      61006262620063636300646464006565650065686B00656C7100697078006C74
      7E006E788400707B8900717E8E007280920071819500708297006F8298006D81
      98006C8198006A829B0068839E006683A0006584A1006485A3006188AA005F8C
      B1005E8EB6005E91BA005F93BD005C93C1005793C5005493C7005293C8005096
      CF005392C8005792C6005C92C2006592BC006B91B7006E90B200728DAC00768B
      A5007B889D008185950087879400928B92009F909100AD969100B89A9100BD9D
      9200C19F9300C4A29300C7A49400CCA79300D2AB9300D8AE9100DFB28F00E1B3
      8F00E2B38F00E1B28F00E1B18D00E0B08D00DEAE8C00DEAE8B00DCAC8B00DAAA
      8B00DAA98A00D8A88B00D6A68A00D3A38900D1A08800CF9E8800CD9B8600CA97
      8300C6938100C4907E00C18D7C00BF8B7B00BB887A00B9867900B7847800B683
      7700B5837700B5827700B3817800B3817900B3827C00B4827E00B5828000B582
      8100B6828200B6828200B6828300B7838300B7848400B8858600B9868900BB85
      8F00C07E9B00CB6FB000D65AC000DF46CF00EA2DE000F31CEE00F90EF800FC06
      FC00FE02FE00FE01FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE01
      FE00FD07FB00FC11F700FA23EF00F73BE400F164D200EB91BE00E7AEB100E5B9
      AC00E4C1A900E5C6A600E6C9A500EACBA200EDCEA000EFD09F00F0D0A100F0D2
      A500F1D4A800F1D5AB00F2D7B000F1D8B400F1D9BA00F1DABF00EFDAC400EFDC
      C700EFDDCC00F3E3D100F4E6D600F7EADB00F9EEE100FAF2E800FBF5ED00FBF6
      F000FCF9F500FDFBF800FEFCFA00FEFDFC00FEFCFB00FEFDFB00D2D2BCBCBCBC
      BCBCBCBCBCBCBCBCBCD2D2D268F6F3EFEDEBE9E7E7E7E7E7BCD2D27D818AF3EF
      EEECEAE8E6E6E6E7BCD2D2D281818BF3F0EEECEBE8E6E6E7BCD2D2D2B481818A
      F3EFEEECEAE8E7E7BCD2D2D2BFFC8184B591B5AA97EAE8E7BCD2D2D2BFFDF892
      94E4F1E29297EAEABCD2D2D2A9FDFA92F0F5F4FFE2AAEDECBCD2D2D2A9FDFDB5
      F6F6F5F9F1B5EEEDBCD2D2D2A2FDFD92F2F8F6F6E391EFEEBCD2D2D2A2FDFDF2
      95F2F6F09493F0E2BCD2D2D29CFDFDFDF292B592E1AFAFAFBCD2D2D29CFDFDFD
      FDFDFDFFF1AF9CA2AED2D2D29AFDFDFDFDFDFDFDF2AFE7AAD2D2D2D29AFAFAF9
      F9F9F9F9F2AFA8D2D2D2D2D29AA2A2A2A2A2A2A2A2AFD2D2D2D2}
    Spacing = 3
  end
  object btnCargar: TBitBtn
    Left = 510
    Top = 376
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Cargar'
    Enabled = False
    TabOrder = 8
    OnClick = btnCargarClick
  end
  object cds: TSQLClientDataSet
    CommandText = 
      'SELECT '#13#10'  MATERIAL.MATERIAL,'#13#10'  PROVEEDOR.RAZON,'#13#10'  SUM(RENGLON' +
      '_ORDENCOMPRA.CANTIDAD) AS CANTIDAD'#13#10'FROM'#13#10'  RENGLON_ORDENCOMPRA'#13 +
      #10'  LEFT OUTER JOIN ORDENCOMPRA ON (RENGLON_ORDENCOMPRA.NUMERO = ' +
      'ORDENCOMPRA.NUMERO)'#13#10'  LEFT OUTER JOIN PROVEEDOR ON (ORDENCOMPRA' +
      '.ID_PROVEEDOR = PROVEEDOR.ID_PROVEEDOR)'#13#10'  LEFT OUTER JOIN MATER' +
      'IAL ON (RENGLON_ORDENCOMPRA.ID_MATERIAL = MATERIAL.ID_MATERIAL)'#13 +
      #10'WHERE'#13#10'  ORDENCOMPRA.ID_OBRA = :id'#13#10'  AND ORDENCOMPRA.FECHA >= ' +
      ':fechaIni '#13#10'  AND ORDENCOMPRA.FECHA <= :fechaFin'#13#10'GROUP BY'#13#10'  MA' +
      'TERIAL.MATERIAL,'#13#10'  PROVEEDOR.RAZON'
    Aggregates = <>
    AggregatesActive = True
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftUnknown
        Name = 'id'
        ParamType = ptInput
      end
      item
        DataType = ftUnknown
        Name = 'fechaIni'
        ParamType = ptInput
      end
      item
        DataType = ftUnknown
        Name = 'fechaFin'
        ParamType = ptInput
      end>
    DBConnection = Datos.Con
    Left = 16
    Top = 376
    object cdsRAZON: TStringField
      DisplayLabel = 'Raz'#243'n Social'
      DisplayWidth = 250
      FieldName = 'RAZON'
      Size = 60
    end
    object cdsMATERIAL: TStringField
      DisplayLabel = 'Material'
      DisplayWidth = 250
      FieldName = 'MATERIAL'
      Size = 60
    end
    object cdsCANTIDAD: TFloatField
      DisplayLabel = 'Cantidad'
      DisplayWidth = 90
      FieldName = 'CANTIDAD'
      DisplayFormat = '##0.00'
    end
  end
  object s: TDataSource
    DataSet = cds
    Left = 48
    Top = 376
  end
end
